<?php
    /*se ejecutan todos los procesos de tablero entrega de turno*/  


    include_once '../clases/Tablero.php';
    /*se recoge la variable del tipo de consulta*/
    $tc = $_REQUEST['tc'];
    
    
    //Se hacen todos los traslados del sistema
    $Tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
    
    $CensoGlobal = $Tablero->ListaCensoGlobal();//Trae todo el censo


    //Se saca el listado de camas contenidas en el censo
    foreach ($CensoGlobal as $cg){

       $listaCG[]=$cg;//variable del censo

    }
    
    include_once '../../../controlador/php/conexion/Conexion.php';
        
        $con = new Conexion();
        session_start();
        
        //Cambio de informacion del paciente entre servicios
        
        //Se consultan todos las pacientes de tablero
        
        $PacientesTablero = "select * from setablero where tipoentrada not in(2)";
        $RespuestaPacientesT = $con->query($PacientesTablero);
        
        while ($RespuestaPacientesT2 = mssql_fetch_array($RespuestaPacientesT)){
                $ListaPacientesCenso[] = $RespuestaPacientesT2;
        }
        
        foreach($listaCG as $LstPacientesCenso){
            
            //Paciente de censo
            $PacienteCenso = $LstPacientesCenso['ID'];
            $OidCamaCenso = $LstPacientesCenso['OIDC'];
            
            //Lista Pacientes entrega turno (setablero)
            foreach ($ListaPacientesCenso as $RespuestaPacientes){
                
                 $PacienteTablero = $RespuestaPacientes['paciente'];
                 $OIdCamaTablero = $RespuestaPacientes['cama'];//Oid de la cama (llave foranea censo - tablero)
                 
                 //Se compara si es el mismo paciente
                 //$PacienteCenso."-".$PacienteTablero."</br>";
                 if($PacienteCenso == $PacienteTablero){
                     
                     //Se compara si es la misma cama
                     //echo$OidCamaCenso."-".$OIdCamaTablero."</br>";
                     if($OidCamaCenso != $OIdCamaTablero){
                        //echo$OidCamaCenso."-".$OIdCamaTablero."</br>";
                        $Traslado = "update setablero
                                        set paciente = '".$RespuestaPacientes['paciente']."',
                                        enobservacion = '".$RespuestaPacientes['enobservacion']."',
                                        auxiliar ='".$RespuestaPacientes['auxiliar']."',
                                        medico ='".$RespuestaPacientes['medico']."',
                                        diagnostico ='".$RespuestaPacientes['diagnostico']."',
                                        enfactual = '".$RespuestaPacientes['enfactual']."',
                                        tratamiento = '".$RespuestaPacientes['tratamiento']."',
                                        observaciones ='".$RespuestaPacientes['observaciones']."',
                                        estado ='".$RespuestaPacientes['estado']."',
                                        tipoentrada = '0',
                                        dolordt = ".$RespuestaPacientes['dolordt'].",
                                        usu_oid='".$_SESSION['usuario']."'
                                    where cama =".$OidCamaCenso;
                        //$con->query($Traslado);
                        
                        $OidCama = "select * from setablero where cama = ".$OidCamaCenso;
                        $RespuestaOId = $con->query($OidCama);
                        
                        while ($RespuestaOId2 = mssql_fetch_array($RespuestaOId)){
                            
                            $OidSetablero = $RespuestaOId2['oid'];
                            
                        }
                        
                        
                        $ActualizarE ="update setespecialidad
                                   set setablero = '".$OidSetablero."'
                                   where paciente = '".$RespuestaPacientes['paciente']."' and setablero = ".$RespuestaPacientes['oid'];
                        //$con->query($ActualizarE);
                        
                        //echo $ress;
                         
                     }
                     
                 }
            }
        }
        
        //Fin cambio de informacion de pacientes entre servicios
        
        $con->cerrarConexion();
    
    
    
    //$Tablero->Traslados($listaCG);
    
    if($tc == 1){
        $Buscar = $_REQUEST['Buscar'];
        
        $datos = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
        
        
        $cama=$datos->listaCama();//trae todas las camas
        $censo = $datos->listaCenso();//trae toda la recion cama paciente
        
        //Se saca el tamaño de la lista para verificar y validar si esta viene vacia o con datos
        $TamaPacientes = count($censo);
        
        //Se valida si el censo viene vacio para mostrar las camas y poder acostra pacientes manualmente
        if($TamaPacientes == 0){
            
            //Se limpian todas las camas puesto que no hay pacientes en el censo
            $datos->SacarTodosPacientes();
            
            $table = $datos->listaTableros($Buscar);
           /*se saca el listado de camas contenidas en tableros*/
           foreach ($table as $t){

              $listat[] = array_map(utf8_encode,$t);

           }

           print_r(json_encode($listat));

        }else{
        
        
            //$datos->Traslados($listaCG);

            /*se saca el listado de camas contenidas en dinamica*/
            foreach($cama as $c){

                $lista[]=$c;//variable de camas

            }

           /*se saca el listado de camas contenidas en el censo*/
           foreach ($censo as $c2){

               $listac[]=$c2;//variable del censo

           }

           //echo count($listac);

           /*se valida si las camas ya estan creadas*/
           $datos->validarCamas($lista);

            session_start();
            include_once '../../../controlador/php/conexion/Conexion.php';

            $con = new Conexion();

            foreach ($lista as $l){
               /*codigo de la cama contenida en tableros*/
               $oidcd = $l['OID'];

               foreach ($listac as $lc){

                   /*codigo de la cama contenida en el censo*/
                   $oidcc = $lc['OIDC'];

                   /*se compara la cama de dinamica y el censo para verificar pacientes existentes en estas camas*/
                   if($oidcd == $oidcc){

                       $oidcamac = $lc['OIDC'];
                       $idpac = $lc['ID'];

                       //$datos->acostarPacUG($oidcamac,$idpac);
                       /*consultamos los datos que hay en x cama*/
                        $select = "select * from setablero where cama = '".$oidcamac."' and servicio='URG'";
                        $res = $con->query($select);

                        while($res2 = mssql_fetch_array($res)){

                            $oidta = $res2['paciente'];
                            $oidt = $res2['oid'];
                            $cam = $res2['cama'];
                            $serv = $res2['servicio'];
                            $aux = $res2['auxiliar'];
                            $med = $res2['medico'];
                            $especi = $res2['especialidad'];
                            $pen = $res2['pendientes'];
                            $fec = $res2['fecha'];
                            $especioid =$res2['especialidadoid'];
                            //$enobser = $res2['enobservacion'];
                            $usu = $res2['usu_oid'];
                            $fecre = $res2['fecharegis'];
                            $diag = $res2['diagnostico'];
                            $obsva = $res2['observaciones'];
                            $tipoe = $res2['tipoentrada'];
                            $est = $res2['estado'];
                            $dolordt = $res2['dolordt'];

                        }
                        //compara si el paciente de tablero es diferente al paciente que viene de censo
                        if($oidta != $idpac){
                            
                            //Traslados
                             
                             //Se hace una consulta con el paciente que viene del censo para verificar si viene de un traslado
                             $PaciCenso = "SELECT A.oid AS OIDSETABLERO,A.servicio,A.paciente,CAST(A.diagnostico AS text)AS DIAGNOSTICO,CAST(A.observaciones AS text)AS PENDIENTES,
                                                       A.estado,CAST(A.enfactual AS text)AS ENFACTUAL,medico,auxiliar,
                                                       A.dolordt,CANTIDAD.CANTIDAD
                                                 FROM setablero AS A
                                                      OUTER APPLY(SELECT COUNT(*) AS CANTIDAD
                                                                  FROM setablero AS B
                                                                  WHERE B.paciente = '".$idpac."' AND A.oid = B.oid)AS CANTIDAD
                                                 WHERE A.paciente = '".$idpac."' AND CANTIDAD.CANTIDAD = 1 AND servicio = 'URG'";
                             $RespuestaPaciente = $con->query($PaciCenso);
                             
                             //Se saca la informacion del paciente
                             while ($RespuestaPaciente2 = mssql_fetch_array($RespuestaPaciente)){
                                 
                                 $CantidadU = $RespuestaPaciente2['CANTIDAD'];
                                 $OidCamaU = $RespuestaPaciente2['OIDSETABLERO'];
                                 $ServicioU = $RespuestaPaciente2['servicio'];
                                 $PacienteU = $RespuestaPaciente2['paciente'];
                                 $DiagnosticoU = $RespuestaPaciente2['DIAGNOSTICO'];
                                 $PendientesU = $RespuestaPaciente2['PENDIENTES'];
                                 $EstadoU = $RespuestaPaciente2['estado'];
                                 $AuxliarU = $RespuestaPaciente2['auxiliar'];
                                 $MedicoU = $RespuestaPaciente2['medico'];
                                 $DolorDtU = $RespuestaPaciente2['dolordt'];
                                 
                             }
                             
                             //Si la variable $Cantidad llega en 1: Es un traslado
                             if($Cantidad == 1){
                                 
                                 if($tipoe == 2){//Paciente manual
                                    //echo 'ola';
                                    /*se hace el registro del paciente que viene del censo*/
                                    $updateTraslado ="update setablero
                                            set paciente = '".$idpac."',
                                            servicio = 'URG',
                                            enobservacion = '0',
                                            auxiliar ='".$AuxliarU."',
                                            medico ='".$MedicoU."',
                                            diagnostico ='".$DiagnosticoU."',
                                            observaciones ='".$PendientesU."',
                                            estado ='5',
                                            dolordt = '".$DolorDtU."',
                                            tipoentrada = '0'
                                          where cama =".$oidcamac." and servicio = 'URG'";
                                    $con->query($updateTraslado);
                                    
                                    //Se trasladan las especielidades si las tiene
                                   $ActualizarEU ="update setespecialidad
                                   set setablero = '".$oidt."'
                                   where paciente = '".$PacienteU."' and setablero = ".$OidCamaU;
                                   $con->query($ActualizarEU);

                                    /*se crea una copia de la cama con todos los datos del paciente que se ingresa manualmente*/
                                   $insert = "insert into setablero(cama,servicio,paciente,auxiliar,medico,especialidad,pendientes,fecha,especialidadoid,clasificacion,atendido,enobservacion,usu_oid,fecharegis,diagnostico,observaciones,estado,tipoentrada,dolordt)values
                                              ('0','URG','".$oidta."','".$aux."','".$med."','','',GETDATE(),'','','','0','".$_SESSION['usuario']."',GETDATE(),'".$diag."','".$obsva."','".$est."',2,".$dolordt.")";
                                   $con->query($insert);

                                }else{

                                    $updateTraslado ="update setablero
                                            set paciente = '".$idpac."',
                                            servicio = 'URG',
                                            enobservacion = '0',
                                            auxiliar ='".$AuxliarU."',
                                            medico ='".$MedicoU."',
                                            diagnostico ='".$DiagnosticoU."',
                                            observaciones ='".$PendientesU."',
                                            estado ='5',
                                            dolordt = '".$DolorDtU."',
                                            tipoentrada = '0'
                                          where cama =".$oidcamac." and servicio = 'URG'";
                                    $con->query($updateTraslado);
                                    
                                     //Se trasladan las especielidades si las tiene
                                    $ActualizarEU ="update setespecialidad
                                    set setablero = '".$oidt."'
                                    where paciente = '".$PacienteU."' and setablero = ".$OidCamaU;
                                    $con->query($ActualizarEU);

                                }
                                 
                             }else{
                                 
                                 if($tipoe == 2){//Paciente manual
                                    //echo 'ola';
                                    /*se hace el registro del paciente que viene del censo*/
                                    $update ="update setablero
                                            set paciente = '".$idpac."',
                                            servicio = 'URG',
                                            enobservacion = '0',
                                            fecharegis = GETDATE(),
                                            auxiliar ='',
                                            medico ='',
                                            diagnostico ='',
                                            observaciones ='',
                                            estado ='5',
                                            dolordt = 0,
                                            tipoentrada = '0',
                                            usu_oid='".$_SESSION['usuario']."'
                                          where cama =".$oidcamac." and servicio = 'URG'";
                                    $con->query($update);

                                    /*se crea una copia de la cama con todos los datos del paciente que se ingresa manualmente*/
                                   $insert = "insert into setablero(cama,servicio,paciente,auxiliar,medico,especialidad,pendientes,fecha,especialidadoid,clasificacion,atendido,enobservacion,usu_oid,fecharegis,diagnostico,observaciones,estado,tipoentrada,dolordt)values
                                              ('0','URG','".$oidta."','".$aux."','".$med."','','',GETDATE(),'','','','0','".$_SESSION['usuario']."',GETDATE(),'".$diag."','".$obsva."','".$est."',2,".$dolordt.")";
                                   $con->query($insert);

                                }else{

                                    $update ="update setablero
                                            set paciente = '".$idpac."',
                                            servicio = 'URG',
                                            enobservacion = '0',
                                            fecharegis = GETDATE(),
                                            auxiliar ='',
                                            medico ='',
                                            diagnostico ='',
                                            observaciones ='',
                                            dolordt = 0,
                                            estado ='5',
                                            usu_oid='".$_SESSION['usuario']."'
                                          where cama =".$oidcamac." and servicio = 'URG'";
                                    $con->query($update);

                                }

                                /*if ($oidta != " "){

                                $insertHistori ="insert into sethistorial(setablero,descripcion,fecharegis,usuario)values('".$oidt."','se hace hitorial de la cama: ".$cam."  del servicio: ".$serv." paciente: ".$oidta." auxiliar: ".$aux." medico: ".$med." especialidad: ".$especi." pendientes: ".$pen." oid especialidad: ".$especioid." diagnostico: ".$diag." observaciones: ".$obsva." registrado por usuario: ".$usu." fecha de registro: ".$fecre."',GETDATE(),'".$_SESSION['usuario']."')";

                                $con->query($insertHistori);
                                }*/ 
                                 
                             }
                             
                             //Fin Traslados
                            
                        }else if($oidta == $idpac && $tipoe == 2){
                            //echo $oidcamac;
                            $update ="update setablero
                                   set paciente = '".$idpac."',
                                   servicio = 'URG',
                                   enobservacion = '0',
                                   fecharegis = GETDATE(),
                                   auxiliar ='".$aux."',
                                   medico ='".$med."',
                                   diagnostico ='".$diag."',
                                   observaciones ='".$obsva."',
                                   dolordt = '".$dolordt."',
                                   estado ='5',
                                   tipoentrada = 0,
                                   usu_oid='".$_SESSION['usuario']."'
                                 where cama =".$oidcamac." and servicio = 'URG'";
                            $con->query($update);

                     }



                        $listaC = "select * from setablero where paciente = '".$idpac."'";
                        $res3 = $con->query($listaC);

                        while($res4 = mssql_fetch_array($res3)){
                            $cama = $res4['cama'];
                            $oidca = $res4['oid'];

                            /*sacamos la cama que no esta en censo*/
                            if($cama != $oidcamac){
                                $update2 ="update setablero
                                         set paciente = '".$idpac."',
                                         servicio = 'URG',
                                         observaciones = '".$res4['observaciones']."',
                                         diagnostico = '".$res4['diagnostico']."',
                                         usu_oid = '".$_SESSION['usuario']."',
                                         auxiliar = '".$res4['auxiliar']."',
                                         medico = '".$res4['medico']."',
                                         estado = '".$res4['estado']."',
                                         dolordt = '".$res4['dolordt']."',
                                         fecharegis = '".$res4['fecharegis']."'
                                       where cama =".$oidcamac." and servicio = 'URG'";
                                $con->query($update2);


                                $update3 ="update setespecialidad
                                           set setablero = '".$oidt."'
                                           where paciente = '".$idpac."' and setablero = ".$oidca;
                                $con->query($update3);

                            }

                        }


                       /*lista de pacientes del censo*/
                       $listaca[] = $oidcamac;

                   }

               }
           }


           $con->cerrarConexion();

           $datos->sacarPaciente($listaca);

           $table = $datos->listaTableros($Buscar);
           /*se saca el listado de camas contenidas en tableros*/
           foreach ($table as $t){

              $listat[] = array_map(utf8_encode,$t);

           }

           print_r(json_encode($listat));
       
        }
 
    }
    else if($tc == 2){
        
        $areaServ = $_REQUEST['areaServ'];
        //$codservi = $_REQUEST['codservi'];
        $BuscarH = $_REQUEST['BuscarH'];
        
        $datos = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
        
        $camaH = $datos->listaCamaH($areaServ);
        $censoH = $datos->listaCensoH($areaServ);
        
        //Se saca el codigo que viene del censo
        
        foreach ($censoH as $CodigoS){
            
            $CodigoServicio = $CodigoS['HSUCODIGO'];
            
        }
        
        $codservi = $CodigoServicio;
        
        //$CensoGlobal = $datos->ListaCensoGlobal();//Trae todo el censo
        
        
        /*se saca el listado de camas contenidas en el censo*/
        //foreach ($CensoGlobal as $cg){
           
           //$listaCG[]=$cg;//variable del censo
           
        //}
        
        //$datos->Traslados($listaCG);
        //Se saca el tamaño de la lista para verificar y validar si esta vacio o viene con datos
        $TamaPacientes = count($censoH);
        
        
        //Se valida si el censo viene vacio = sin pacientes acostados en las camas
        if($TamaPacientes == 0){
            
            //Se limpian todas las camas puesto que no hay pacientes en el censo
            $datos->SacarTodosPacientesH($codservi);
            
           /*se saca el listado de camas contenidas en tableros*/
           $table = $datos->listaTablerosH($codservi,$BuscarH);
            
        }else{
            
            
            //if($CodigoServicio != $codservi){
            
                //$table = $datos->listaTablerosH($codservi,$BuscarH);
                
            ///}else{
                
                
                foreach ($camaH as $ch){

                    $lista[] =  $ch;

                }
                foreach ($censoH as $ch2){

                    $listac[] = $ch2;

                }
                $datos->validarCamasH($lista,$codservi);

                 session_start();
                 include_once '../../../controlador/php/conexion/Conexion.php';

                 $con = new Conexion();

                 foreach ($lista as  $l){
                  $oidcd = $l['OID'];


                 foreach ($listac as $lc){
                       /*codigo de la cama contenida en el censo*/
                       $oidcc = $lc['CAMA'];


                       /*se compara la cama de dinamica y el censo para verificar pacientes existentes en estas camas*/
                       if($oidcd == $oidcc){

                           $oidcd = $l['OID'];
                           $idpac = $lc['PACNUMDOC'];


                            //$datos->acostarPacH($oidcd,$idpac,$codservi);
                            /*acostamos pacientes*/    


                             $select = "select * from setablero where cama = '".$oidcd."' and servicio='".$codservi."'";
                             $resp = $con->query($select);

                             while ($resp2 = mssql_fetch_array($resp)){

                                $oidta = $resp2['paciente'];
                                $oidt = $resp2['oid'];
                                $cam = $resp2['cama'];
                                $serv = $resp2['servicio'];
                                $aux = $resp2['auxiliar'];
                                $med = $resp2['medico'];
                                $especi = $resp2['especialidad'];
                                $pen = $resp2['pendientes'];
                                $especioid = $resp2['especialidadoid'];
                                $usu = $resp2['usu_oid'];
                                $fecre = $resp2['fecharegis'];
                                $enfac = $resp2['enfactual'];
                                $tratam = $resp2['tratamiento'];
                                $diag = $resp2['diagnostico'];
                                $obsva= $resp2['observaciones'];
                                $tpe = $resp2['tipoentrada'];
                                $dolordt = $resp2['dolordt'];

                             }

                             /*echo 'oid cama dinamica ->'.$oidcd."</br>";
                             echo 'paciente tablero ->'.$oidta."</br>";
                             echo 'paciente dinamica ->'.$idpac."</br>";
                             echo 'tipo entrada ->'.$tpe."</br>";*/


                             if ($oidta != $idpac){

                                 //Traslados

                                 //Se hace una consulta con el paciente que viene del censo para verificar si viene de un traslado
                                 $PaciCenso = "SELECT A.oid AS OIDSETABLERO,A.servicio,A.paciente,CAST(A.diagnostico AS text)AS DIAGNOSTICO,CAST(A.observaciones AS text)AS PENDIENTES,
                                                           A.estado,CAST(A.enfactual AS text)AS ENFACTUAL,CAST(A.tratamiento AS text)AS TRATAMIENTO,
                                                           A.dolordt,CANTIDAD.CANTIDAD
                                                     FROM setablero AS A
                                                          OUTER APPLY(SELECT COUNT(*) AS CANTIDAD
                                                                      FROM setablero AS B
                                                                      WHERE B.paciente = '".$idpac."' AND A.oid = B.oid)AS CANTIDAD
                                                     WHERE A.paciente = '".$idpac."' AND CANTIDAD.CANTIDAD = 1";
                                 $RespuestaPaciente = $con->query($PaciCenso);

                                 //Se saca la informacion del paciente
                                 while ($RespuestaPaciente2 = mssql_fetch_array($RespuestaPaciente)){

                                     $Cantidad = $RespuestaPaciente2['CANTIDAD'];
                                     $OidCama = $RespuestaPaciente2['OIDSETABLERO'];
                                     $Servicio = $RespuestaPaciente2['servicio'];
                                     $Paciente = $RespuestaPaciente2['paciente'];
                                     $Diagnostico = $RespuestaPaciente2['DIAGNOSTICO'];
                                     $Pendientes = $RespuestaPaciente2['PENDIENTES'];
                                     $Estado = $RespuestaPaciente2['estado'];
                                     $EnfActual = $RespuestaPaciente2['ENFACTUAL'];
                                     $Tratamiento = $RespuestaPaciente2['TRATAMIENTO'];
                                     $DolorDt = $RespuestaPaciente2['dolordt'];

                                 }

                                 //Si la variable $Cantidad llega en 1: Es un traslado
                                 if($Cantidad == 1){
                                     //echo 'entra';
                                     //Se valida si es un paciente manual
                                     if($tpe == 2){

                                        /*se hace el registro del paciente que viene del censo*/
                                       $UpdateTraslado ="update setablero
                                               set paciente = '".$Paciente."',
                                               enobservacion = 0,
                                               fecharegis = GETDATE(),
                                               auxiliar ='',
                                               medico ='',
                                               enfactual = '".$EnfActual."',
                                               tratamiento = '".$Tratamiento."',
                                               diagnostico ='".$Diagnostico."',
                                               observaciones ='".$Pendientes."',
                                               estado = '".$Estado."',
                                               FechaEstado = GETDATE(),
                                               dolordt = '".$DolorDt."',
                                               tipoentrada = '0'
                                             where cama =".$oidcd." and servicio = '".$codservi."'";
                                       $con->query($UpdateTraslado);

                                       //Se trasladan las especielidades si las tiene
                                       $ActualizarE ="update setespecialidad
                                       set setablero = '".$oidt."'
                                       where paciente = '".$Paciente."' and setablero = ".$OidCama;
                                       $con->query($ActualizarE);

                                       /*se crea una copia de la cama con todos los datos del paciente que se ingresa manualmente*/
                                       $insert = "insert into setablero(cama,servicio,paciente,auxiliar,medico,especialidad,pendientes,fecha,especialidadoid,clasificacion,atendido,enobservacion,usu_oid,fecharegis,diagnostico,observaciones,estado,tipoentrada,dolordt,enfactual,tratamiento)values
                                                 ('0','".$codservi."','".$oidta."','".$aux."','".$med."','','',GETDATE(),'','','','0','".$_SESSION['usuario']."',GETDATE(),'".$diag."','".$obsva."','".$est."',2,'".$dolordt."','".$enfac."','".$tratam."')";
                                      $con->query($insert);

                                    }else{
                                      //echo"entra";
                                      $UpdateTraslado ="update setablero
                                               set paciente = '".$Paciente."',
                                               enobservacion = 0,
                                               fecharegis = GETDATE(),
                                               auxiliar ='',
                                               medico ='',
                                               enfactual = '".$EnfActual."',
                                               tratamiento = '".$Tratamiento."',
                                               diagnostico ='".$Diagnostico."',
                                               observaciones ='".$Pendientes."',
                                               estado = '".$Estado."',
                                               FechaEstado = GETDATE(),
                                               dolordt = '".$DolorDt."',
                                               tipoentrada = '0'
                                             where cama =".$oidcd." and servicio = '".$codservi."'";
                                       $con->query($UpdateTraslado);

                                       //Se trasladan las especielidades si las tiene
                                       $ActualizarE ="update setespecialidad
                                       set setablero = '".$oidt."'
                                       where paciente = '".$Paciente."' and setablero = ".$OidCama;
                                       $con->query($ActualizarE);

                                    }

                                 }else{

                                     if($tpe == 2){
                                        /*se hace el registro del paciente que viene del censo*/
                                       $update ="update setablero
                                               set paciente = '".$idpac."',
                                               servicio = '".$codservi."',
                                               enobservacion = 0,
                                               fecharegis = GETDATE(),
                                               auxiliar ='',
                                               medico ='',
                                               enfactual = '',
                                               tratamiento = '',
                                               diagnostico ='',
                                               observaciones ='',
                                               estado =5,
                                               FechaEstado = GETDATE(),
                                               dolordt = 0,
                                               tipoentrada = '0',
                                               usu_oid = '".$_SESSION['usuario']."'
                                             where cama ='".$oidcd."' and servicio = '".$codservi."'";
                                       $con->query($update);
                                       /*se crea una copia de la cama con todos los datos del paciente que se ingresa manualmente*/
                                       $insert = "insert into setablero(cama,servicio,paciente,auxiliar,medico,especialidad,pendientes,fecha,especialidadoid,clasificacion,atendido,enobservacion,usu_oid,fecharegis,diagnostico,observaciones,estado,tipoentrada,dolordt,enfactual,tratamiento)values
                                                 ('0','".$codservi."','".$oidta."','".$aux."','".$med."','','',GETDATE(),'','','','0','".$_SESSION['usuario']."',GETDATE(),'".$diag."','".$obsva."','".$est."',2,'".$dolordt."','".$enfac."','".$tratam."')";
                                      $con->query($insert);
                                    }else{

                                      $update ="update setablero
                                                 set paciente = '".$idpac."',
                                                 fecharegis = GETDATE(),
                                                 servicio = '".$codservi."',
                                                 auxiliar ='',
                                                 medico ='',
                                                 diagnostico ='',
                                                 observaciones ='',
                                                 tratamiento = '',
                                                 enfactual = '',
                                                 tipoentrada = '0',
                                                 estado ='5',
                                                 FechaEstado = GETDATE(),
                                                 usu_oid='".$_SESSION['usuario']."'
                                               where cama =".$oidcd." and servicio = '".$codservi."'";
                                      $con->query($update);

                                    }
                                   /*if ($oidta !=" "){
                                   $insertHistori ="insert into sethistorial(setablero,descripcion,fecharegis,usuario)values('".$oidt."','se hace hitorial de la cama: ".$cam." del servicio: ".$serv." paciente: ".$oidta." auxiliar: ".$aux." medico: ".$med." especialidad: ".$especi." pendientes: ".$pen." oid especialidad: ".$especioid." diagnostico: ".$diag." observaciones: ".$obsva." registrado por usuario: ".$usu." fecha de registro: ".$fecre."',GETDATE(),'".$_SESSION['usuario']."')";

                                   $con->query($insertHistori);
                                   }*/

                                 }




                                 //Fin Traslados

                             }else if($oidta == $idpac && $tpe == 2){

                                 $update ="update setablero
                                               set paciente = '".$idpac."',
                                               fecharegis = GETDATE(),
                                               servicio = '".$codservi."',
                                               auxiliar ='".$aux."',
                                               medico ='".$med."',
                                               diagnostico ='".$diag."',
                                               observaciones ='".$obsva."',
                                               tratamiento = '".$tratam."',
                                               enfactual = '".$enfac."',
                                               tipoentrada = '0',
                                               estado ='5',
                                               dolordt = '".$dolordt."',
                                               FechaEstado = GETDATE(),
                                               usu_oid='".$_SESSION['usuario']."'
                                             where cama =".$oidcd." and servicio = '".$codservi."'";
                                    $con->query($update);

                             }


                             /*consulta que trae los pacientes que se encuantran en el censo*/
                            $listaC = "select * from setablero where paciente = '".$idpac."'";
                            $res3 = $con->query($listaC);

                            while($res4 = mssql_fetch_array($res3)){
                                $cama = $res4['cama'];
                                $oidca = $res4['oid'];

                                /*sacamos la cama que no esta en censo*/
                                if($cama != $oidcd){
                                    $update2 ="update setablero
                                                set paciente = '".$idpac."',
                                                servicio = '".$codservi."',
                                                observaciones = '".$res4['observaciones']."',
                                                diagnostico = '".$res4['diagnostico']."',
                                                enfactual = '".$res4['enfactual']."',
                                                tratamiento = '".$res4['tratamiento']."',
                                                usu_oid = '".$_SESSION['usuario']."',
                                                auxiliar = '".$res4['auxiliar']."',
                                                medico = '".$res4['medico']."',
                                                estado = '".$res4['estado']."',
                                                tipoentrada = '0',
                                                FechaEstado = GETDATE(),
                                                fecharegis ='".$res4['fecharegis']."'
                                             where cama =".$oidcd." and servicio = '".$codservi."'";
                                    //$con->query($update2);


                                    $update3 ="update setespecialidad
                                               set setablero = '".$oidt."'
                                               where paciente = '".$idpac."' and setablero = ".$oidca;
                                    //$con->query($update3);

                                }

                            }


                       /**/    

                       $listaca[] = $oidcd;

                       }
                   }
                }
                $con->cerrarConexion();
                $datos->sacarPacienteH($listaca,$codservi);

                $table = $datos->listaTablerosH($codservi,$BuscarH);
                
                
                
            //}
            
        
        }
        
        /*foreach ($table as $t){
           
           $listat[] = array_map(utf8_encode,$t);
           
       }
       
       print_r(json_encode($listat));*/
       
    }
    else if($tc == 3){
        
       $datosn = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $listacn = $datosn->listaCamaNeo();
       
       
       /*Lista de las camas creadas en la tabla camasn*/
       foreach ($listacn as $lcn){
           
           $listacan[] = $lcn;
           
       }
       
       $datosn->validarCamasN($listacan);
       
       $listaneo = $datosn->camasNeonatos();
       
       foreach ($listaneo as $lstneo){
           
           $lista[] = $lstneo;
           
       }
       
       print_r(json_encode($lista));
       
   }else if($tc == 4){
       
       include_once '../../../controlador/php/conexion/Conexion10.php';
       
       $con = new Conexion10();
       
       $select = "SELECT G.PACNUMDOC, RTRIM(G.PACPRINOM)+' '+RTRIM(G.PACSEGNOM)+' '+RTRIM(G.PACPRIAPE)+' '+RTRIM(G.PACSEGAPE) AS NOMBRE 
                  FROM ADNINGRESO AS A INNER JOIN GENPACIEN AS G ON A.GENPACIEN=G.OID 
                  WHERE A.AINESTADO=0 AND A.AINCAUING=4 ORDER BY 2,1";
       $res = $con->query($select);
       
       while($res2 = mssql_fetch_array($res)){
           
           $lista[] = array_map(utf8_encode,$res2);
           
       }
       
       print_r(json_encode($lista));
       
       $con->cerrarConexion();

   }else if($tc == 5){
       
       include_once '../../../controlador/php/conexion/Conexion10.php';
       
       $con = new Conexion10();
       
       $oidser = $_REQUEST['areasho'];
       
       $select = "SELECT OID,HSUCODIGO,HSUNOMBRE FROM HPNSUBGRU WHERE OID NOT IN (16,17,18,20,23) AND OID = '".$oidser."' ORDER BY 2";
       $res = $con->query($select);
       
       while($res2 = mssql_fetch_array($res)){
           
           $lista[] = array_map(utf8_encode,$res2);
           
       }
       
       print_r(json_encode($lista));
       
       $con->cerrarConexion();

   }else if($tc == 6){
       
       $atendido = $_REQUEST['atendido'];
       $paciente = $_REQUEST['paciente'];
       $aux = $_REQUEST['aux'];
       $medico = $_REQUEST['medico'];
       $especial = $_REQUEST['especial'];
       $pendiente = $_REQUEST['pendiente'];
       $conducta = $_REQUEST['conducta'];
       $cama = $_REQUEST['oidca'];
       $clasificacion = $_REQUEST['clasificacion'];
       $textod = $_REQUEST['textod'];
       $tratamiento = $_REQUEST['tratamiento'];
       $textobs = $_REQUEST['textobs'];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->guardarPacienteNeo($atendido,$paciente,$aux,$medico,$especial,$pendiente,$conducta,$cama,$clasificacion,$textod,$tratamiento,$textobs);
       

   }else if ($tc == 7){
       
       /*$auxi =  $_REQUEST['auxi'];*/
       //$med = $_REQUEST['med'];
       $espe = $_REQUEST['espe'];
       $pend = $_REQUEST['pend'];
       $oid = $_REQUEST['oid'];
       $diag = $_REQUEST['diag'];
       $obs = $_REQUEST['obs'];
       $esta = $_REQUEST['esta'];
       $paciente = $_REQUEST['paciente'];
       $med = $_REQUEST['med'];
       $auxiliar = $_REQUEST['auxiliar'];
       $tpe = $_REQUEST['tpe'];
       $dolordt = $_REQUEST['dolordt'];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->guardarPacienteU($espe, $pend, $oid, $diag, $obs, $esta,$paciente,$med,$auxiliar,$tpe,$dolordt);
       
   }else if ($tc == 8){ 
       
       include_once '../../../controlador/php/conexion/Conexion10.php';
       
       $con = new Conexion10();
       
       $pac = $_REQUEST['pac'];
       $ingreso = $_REQUEST['ingreso'];
       
       $select = "Select HCNSOLEXA.OID,ADNINGRESO.AINCONSEC AS INGRESO, HCNSOLEXA.HCSCANTI AS CANTIDAD,
                CONVERT(NVARCHAR(2000),HCNSOLEXA.HCSOBSERV) AS OBSERVACIONES,HCNSOLEXA.HCSFECSOL AS FECHA_SOLICITUD,
                HCNFOLIO.HCNUMFOL AS NUM_FOLIO,GENSERIPS.SIPCODIGO AS CODIGO, ltrim(rtrim(GENSERIPS.SIPNOMBRE)) AS MUESTRA,
                GENPACIEN.PACNUMDOC AS DOCUMENTO,RTrim(GENPACIEN.PACPRINOM +' '+
                GENPACIEN.PACSEGNOM +' '+ GENPACIEN.PACPRIAPE +' '+ GENPACIEN.PACSEGAPE) AS NOM_PACIENTE,
                HPNDEFCAM.HCACODIGO AS CAMA,GENMEDICO.GMENOMCOM AS MEDICO,Case
                When HCNSOLEXA.HCSESTADO = '0' Then 'URGENTE' Else 'RUTINARIO'
                End ESTADO, GENPACIEN.GPAFECNAC,Case
                When ADNINGRESO.AINTIPING = '1' Then 'AMBULATORIO' Else 'HOSPITALARIO'
                End CLASE_INGRESO,Case When ADNINGRESO.AINURGCON = '0' Then 'URGENCIAS'
                When ADNINGRESO.AINURGCON = '1' Then 'CONSULTA_EXTERNA'
                When ADNINGRESO.AINURGCON = '2' Then 'NACIDO_HOSPITAL'
                When ADNINGRESO.AINURGCON = '3' Then 'REMITIDO'
                When ADNINGRESO.AINURGCON = '4' Then 'HOSPI_URGENCIAS'
                When ADNINGRESO.AINURGCON = '5' Then 'HOSPITALIZACIÓN'
                When ADNINGRESO.AINURGCON = '6' Then 'IMAGENES'
                When ADNINGRESO.AINURGCON = '7' Then 'LABORATORIO'
                End INGRESO_POR,Case SLNORDSER.SOSESTADO When 0 Then 'REGISTRADO'
                When 1 Then 'CONFIRMADO' When 2 Then 'ANULADO'
                End As ESTADOORDEN,CONVERT(NVARCHAR(100),SLNORDSER.SOSDESORD) AS ORDEN_SERVICIO,
                SLNORDSER.SOSORDSER, lbseguimiento.segfectom  as fechatoma,lbseguimiento.segfecrec, lbseguimiento.segestado,lbseguimiento.segrecibido,
                usuario.usu_oid, lbseguimiento.usu_oidr,RTRIM(usuario.usu_nombres +''+usuario.usu_apellidos)AS NOMBRES,
                lbsinindicacion.indiesta, lbseguimiento.seginterpretado,lbseguimiento.usu_oidm,lbseguimiento.segfecinte,
                CASE  WHEN HCNRESEXA.OID IS NULL  THEN '0' ELSE '1' END RESULTADO
                From GENPACIEN Inner Join
                ADNINGRESO On GENPACIEN.OID = ADNINGRESO.GENPACIEN Inner Join
                HCNFOLIO On ADNINGRESO.OID = HCNFOLIO.ADNINGRESO Inner Join
                GENMEDICO On HCNFOLIO.GENMEDICO = GENMEDICO.OID Inner Join
                HCNSOLEXA On HCNSOLEXA.HCNFOLIO = HCNFOLIO.OID Inner Join
                GENSERIPS On HCNSOLEXA.GENSERIPS = GENSERIPS.OID Inner Join
                SLNSERHOJ On HCNSOLEXA.SLNSERHOJ = SLNSERHOJ.OID Inner Join
                SLNSERPRO On SLNSERHOJ.OID = SLNSERPRO.OID Inner Join
                SLNORDSER On SLNSERPRO.SLNORDSER1 = SLNORDSER.OID And SLNSERPRO.ADNINGRES1 =
                SLNORDSER.ADNINGRES1 Left Outer Join
                HPNESTANC On ADNINGRESO.OID = HPNESTANC.ADNINGRES Left Outer Join
                HPNDEFCAM On HPNESTANC.HPNDEFCAM = HPNDEFCAM.OID
                left join planillaUsuario..lbseguimiento on HCNSOLEXA.OID  = planillaUsuario..lbseguimiento.hcnsolexa
                left join planillaUsuario ..usuario on usuario.usu_oid = planillaUsuario..lbseguimiento.usu_oid
                left join planillaUsuario..lbsinindicacion on HCNSOLEXA.OID = planillaUsuario..lbsinindicacion.hcnsolexa
                left outer join HCNRESEXA  on HCNSOLEXA.OID = HCNRESEXA.HCNSOLEXA
                Where
                GENSERIPS.GENARESER1 = '15' And HPNESTANC.HESFECSAL Is Null and PACNUMDOC = '".$pac."' and ADNINGRESO.AINCONSEC = ".$ingreso."
                Order By HCNSOLEXA.HCSFECSOL DESC";
       $res = $con->query($select);
       
       while($res2 = mssql_fetch_array($res)){
           
           $lista[] = array_map(utf8_encode,$res2);
           
       }
       
       print_r(json_encode($lista));
       
       $con->cerrarConexion();
       
   }else if ($tc == 9){ 
       
       include_once '../../../controlador/php/conexion/Conexion10.php';
       
       $con = new Conexion10();
       
       $pac = $_REQUEST['pac'];
       $ingreso = $_REQUEST['ingreso'];
       
       $select = "SELECT HCNSOLEXA.OID,ADNINGRESO.AINCONSEC AS INGRESO, HCNSOLEXA.HCSCANTI AS CANTIDAD,
                    CONVERT(NVARCHAR(2000),HCNSOLEXA.HCSOBSERV) AS OBSERVACIONES,HCNSOLEXA.HCSFECSOL AS FECHA_SOLICITUD,
                    HCNFOLIO.HCNUMFOL AS NUM_FOLIO,GENSERIPS.SIPCODIGO AS CODIGO, ltrim(rtrim(GENSERIPS.SIPNOMBRE)) AS MUESTRA,
                    GENPACIEN.PACNUMDOC AS DOCUMENTO,RTrim(GENPACIEN.PACPRINOM +' '+
                    GENPACIEN.PACSEGNOM +' '+ GENPACIEN.PACPRIAPE +' '+ GENPACIEN.PACSEGAPE) AS NOM_PACIENTE,
                    HPNDEFCAM.HCACODIGO AS CAMA,GENARESER.GASCODIGO, GENARESER.GASNOMBRE,GENMEDICO.GMENOMCOM AS MEDICO,Case
                    When HCNSOLEXA.HCSESTADO = '0' Then 'URGENTE' Else 'RUTINARIO'
                    End ESTADO, GENPACIEN.GPAFECNAC,Case
                    When ADNINGRESO.AINTIPING = '1' Then 'AMBULATORIO' Else 'HOSPITALARIO'
                    End CLASE_INGRESO,Case When ADNINGRESO.AINURGCON = '0' Then 'URGENCIAS'
                    When ADNINGRESO.AINURGCON = '1' Then 'CONSULTA_EXTERNA'
                    When ADNINGRESO.AINURGCON = '2' Then 'NACIDO_HOSPITAL'
                    When ADNINGRESO.AINURGCON = '3' Then 'REMITIDO'
                    When ADNINGRESO.AINURGCON = '4' Then 'HOSPI_URGENCIAS'
                    When ADNINGRESO.AINURGCON = '5' Then 'HOSPITALIZACIÓN'
                    When ADNINGRESO.AINURGCON = '6' Then 'IMAGENES'
                    When ADNINGRESO.AINURGCON = '7' Then 'LABORATORIO'
                    End INGRESO_POR,Case SLNORDSER.SOSESTADO When 0 Then 'REGISTRADO'
                    When 1 Then 'CONFIRMADO' When 2 Then 'ANULADO'
                    End As ESTADOORDEN,CONVERT(NVARCHAR(100),SLNORDSER.SOSDESORD) AS ORDEN_SERVICIO,
                    SLNORDSER.SOSORDSER,segfecindi,segestado,trestado,tmestado,inestado, asigfecha,asigobserv,seginterpre.usu_oid as UsuarioInterpreto,
                    CASE  WHEN SLNSERHOJ.OID IS NULL  THEN '0' ELSE '1' END RESULTADO
                    From GENPACIEN Inner Join
                    ADNINGRESO On GENPACIEN.OID = ADNINGRESO.GENPACIEN Inner Join
                    HCNFOLIO On ADNINGRESO.OID = HCNFOLIO.ADNINGRESO Inner Join
                    GENMEDICO On HCNFOLIO.GENMEDICO = GENMEDICO.OID Inner Join
                    HCNSOLEXA On HCNSOLEXA.HCNFOLIO = HCNFOLIO.OID Inner Join
                    GENSERIPS On HCNSOLEXA.GENSERIPS = GENSERIPS.OID Inner Join
                    SLNSERHOJ On HCNSOLEXA.SLNSERHOJ = SLNSERHOJ.OID Inner Join
                    SLNSERPRO On SLNSERHOJ.OID = SLNSERPRO.OID Inner Join
                    SLNORDSER On SLNSERPRO.SLNORDSER1 = SLNORDSER.OID And SLNSERPRO.ADNINGRES1 =
                    SLNORDSER.ADNINGRES1 Left Outer Join
                    HPNESTANC On ADNINGRESO.OID = HPNESTANC.ADNINGRES Left Outer Join
                    HPNDEFCAM On HPNESTANC.HPNDEFCAM = HPNDEFCAM.OID
                    left join HPNGRUPOS on HPNDEFCAM.HPNGRUPOS = HPNGRUPOS.OID
                    left join HPNSUBGRU ON HPNSUBGRU.OID = HPNDEFCAM.HPNSUBGRU 
                    left join GENARESER ON GENARESER.OID = HPNSUBGRU.GENARESER 
                    left join planillaUsuario..segimagenes on HCNSOLEXA.OID  = planillaUsuario..segimagenes.hcnsolexa
                    left join planillaUsuario..segtranslado on HCNSOLEXA.OID = planillaUsuario..segtranslado.hcnsolexa
                    left join planillaUsuario..segtomado on HCNSOLEXA.OID = planillaUsuario..segtomado.hcnsolexa
                    left join planillaUsuario..seginterpre on HCNSOLEXA.OID = planillaUsuario..seginterpre.hcnsolexa
                    left join planillaUsuario.. segasigcita on HCNSOLEXA.OID = planillaUsuario..segasigcita.hcnsolexa
                    left outer join hcnressvfc  on SLNSERHOJ.OID = hcnressvfc.SLNSERHOJ
                    Where 
                    GENSERIPS.GENARESER1  IN (6,7,8,9,10,11,12,14) And HPNESTANC.HESFECSAL Is Null and ADNINGRESO.AINCONSEC = ".$ingreso."
                    and PACNUMDOC = '".$pac."'
                    Order By HCNSOLEXA.HCSFECSOL DESC";
       $res = $con->query($select);
       
       while($res2 = mssql_fetch_array($res)){
           
           $lista[] = array_map(utf8_encode,$res2);
           
       }
       
       print_r(json_encode($lista));
       
       $con->cerrarConexion();
       
   }else if($tc == 10){
       
       $enfact = $_REQUEST['enfact'];
       $tratamiento = $_REQUEST['tratamiento'];
       $diagnos = $_REQUEST['diagnos'];
       $observa = $_REQUEST['observa'];
       $oid = $_REQUEST['oid'];
       $esta = $_REQUEST['esta'];
       $paciente = $_REQUEST['paciente'];
       $serv = $_REQUEST['serv'];
       $dolordt = $_REQUEST['dolordt'];
       $tpe = $_REQUEST['tpe'];
       
        $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->guardarPacienteH($oid, $enfact , $tratamiento, $diagnos, $observa, $esta,$paciente,$serv,$dolordt,$tpe);
   }else if ($tc == 11){
       
       $aux = $_REQUEST['aux'];
       $med =$_REQUEST['med'];
       $oid =$_REQUEST['oid'];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->guardarTableroU($aux, $med, $oid);
   }else if($tc == 12){
       
       $obs = $_REQUEST["obs"];
       $entrega = $_REQUEST["entrega"];
       $recibe = $_REQUEST["recibe"];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->guardarObs($obs,$entrega,$recibe);
       
       
   }else if($tc == 13){
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->cargarObs();
       
   }else if($tc == 14){
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->cargarCamasV();
       
   }else if($tc == 15){
       
       $oid = $_REQUEST['oid'];
       $paciente = $_REQUEST['paciente'];
       $cama = $_REQUEST['cama'];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->traslado($oid,$paciente,$cama);
       
   }else if($tc == 16){
       
       include_once '../../../controlador/php/conexion/Conexion10.php';
       
       $con = new Conexion10();
       
       $paciente = $_REQUEST['paciente'];
       
       $select = "select PACNUMDOC,RTRIM(PACPRINOM+' '+PACSEGNOM+' '+PACPRIAPE+' '+PACSEGAPE)AS NOMPAC, GDENOMBRE,AINCONSEC,SUBSTRING(CONVERT (VARCHAR(10),AINFECING,103),1,10)+' '+CONVERT(VARCHAR(5), AINFECING, 114) AS FECHA,
                         CAST(DATEDIFF(DD, GENPACIEN.GPAFECNAC, GETDATE()) / 365.25 AS INT) AS EDAD
                  from GENPACIEN left outer join ADNINGRESO on GENPACIEN.OID = ADNINGRESO.GENPACIEN
                                             INNER JOIN GENDETCON AS GE ON ADNINGRESO.GENDETCON=GE.OID
                  WHERE AINESTADO=0 AND PACNUMDOC ='".$paciente."'";
       $res = $con->query($select);
       
       while($res2 = mssql_fetch_array($res)){
           
           $lista[] = array_map(utf8_encode,$res2);
           
       }
       
       print_r(json_encode($lista));
       
       $con->cerrarConexion();
       
   }else if($tc == 17){
       
       include_once '../../../controlador/php/conexion/Conexion10.php';
       
       $con = new Conexion10();
       
       
       $select = "SELECT USUNOMBRE, USUDESCRI,GEEDESCRI,GENMEDICO.OID as oidm
                  FROM GENMEDICO
                                            INNER JOIN GENESPMED ON GENESPMED.MEDICOS = GENMEDICO.OID 
                                            INNER JOIN GENESPECI ON GENESPMED.ESPECIALIDADES = GENESPECI.OID
                                            INNER JOIN GENUSUARIO ON GENMEDICO.GENUSUARIO = GENUSUARIO.OID
                  WHERE GEEDESCRI LIKE '%MEDICINA GENERAL%'  /*AND USUESTADO='1'*/ and GMEESTADO='0'
                  ORDER BY USUDESCRI";
       $res = $con->query($select);
       
       while($res2 = mssql_fetch_array($res)){
           
           $lista[] = array_map(utf8_encode,$res2);
           
       }
       
       print_r(json_encode($lista));
       
       $con->cerrarConexion();
       
   }else if($tc == 18){
       
        ini_set("mssql.textlimit",2147483647);
        ini_set("mssql.textsize",2147483647);
        //conexion a la base de datos
        $servidor = "192.168.10.9\DINAMICA";
        $usuario = "sa";
        $clave = "admin4";
        $base_de_datos = "planillaUsuario";

        mssql_connect($servidor, $usuario, $clave ) ;
        mssql_select_db($base_de_datos) ;
       
       $select = "SELECT t.oid,t.cama,servicio, paciente,HCACODIGO,
                           case when dg10.NOMPAC is null then '' else dg10.NOMPAC end as NOMPAC,
                           case when dg10.AINCONSEC is null then '' else dg10.AINCONSEC end as AINCONSEC,
                           case when dg10.GDENOMBRE is null then '' else dg10.GDENOMBRE end as GDENOMBRE,  
                           auxiliar,
                           case when USUDESCRI is null then '' else USUDESCRI end as medico2,
                           cast(diagnostico as text)as diagnostico,cast(observaciones as text)as observaciones,
                           case when LTRIM(RTRIM(usuario.usu_nombres)) +' '+ ltrim(rtrim(usu_apellidos)) is null then '' else LTRIM(RTRIM(usuario.usu_nombres)) +' '+ ltrim(rtrim(usu_apellidos)) end as nombres,
                           fecharegis,
                           case when dg10.EDAD is null then '' else dg10.EDAD end as EDAD,
                           case 
                           when estado = 0 then ''  
                           when estado = 1 then 'Observado'
                           when estado = 2 then 'Hospitalizado' 
                           when estado = 3 then 'Administracion de Medicamentos'
                           when estado = 4 then 'Salida' 
                           when estado = 5 then 'Quirofano'
                           end as estado,
                           case when t.dolordt = 1 then 'SI' else 'NO' end as dolordt
                       FROM setablero as t
                                       LEFT OUTER JOIN ".$con->getReal()."..HPNDEFCAM on t.cama = HPNDEFCAM.OID 
                                       LEFT OUTER JOIN ".$con->getReal()."..GENMEDICO ON t.medico = GENMEDICO.OID
                                       LEFT OUTER JOIN ".$con->getReal()."..GENUSUARIO ON GENMEDICO.GENUSUARIO = GENUSUARIO.OID
                                       left outer join usuario on t.usu_oid = usuario.usu_oid
                                       outer apply(select PACNUMDOC,RTRIM(PACPRINOM+' '+PACSEGNOM+' '+PACPRIAPE+' '+PACSEGAPE)AS NOMPAC, GDENOMBRE,AINCONSEC,SUBSTRING(CONVERT (VARCHAR(10),AINFECING,103),1,10)+' '+CONVERT(VARCHAR(5), AINFECING, 114) AS FECHA,
                                                          CAST(DATEDIFF(DD, GENPACIEN.GPAFECNAC, GETDATE()) / 365.25 AS INT) AS EDAD
                                                   from ".$con->getReal()."..GENPACIEN left outer join ".$con->getReal()."..ADNINGRESO on GENPACIEN.OID = ADNINGRESO.GENPACIEN
                                                                              INNER JOIN ".$con->getReal()."..GENDETCON AS GE ON ADNINGRESO.GENDETCON=GE.OID
                                                   WHERE AINESTADO=0  and PACNUMDOC = t.paciente)as dg10
                                      outer apply (select count(*) as n
                                                   from setespecialidad
                                                   where setespecialidad.setablero = t.oid and setespecialidad.paciente = t.paciente)as nes
                       WHERE servicio = 'URG'
                       ORDER BY HCACODIGO asc";
            $res = mssql_query($select);

            $copia = '<table>
                        <tr align="center">
                            <td>
                                <strong>CAMA</strong>
                            </td>
                            <td>
                                <strong>PACIENTE</strong>
                            </td>
                            <td>
                                <strong>DOCUMENTO</strong>
                            </td>
                            <td>
                                <strong>INGRESO</strong>
                            </td>
                            <td>
                               <strong>EDAD</strong>
                            </td>
                            <td>
                                <strong>ASEGURADOR</strong>
                            </td>
                            <td>
                                <strong>AUXLIAR ASIGNADA</strong>
                            </td>
                            <td>
                                <strong>MEDICO</strong>
                            </td>
                            <td>
                                <strong>DIAGNSTICO</strong>
                            </td>
                            <td>
                                <strong>OBSERVACIONES</strong>
                            </td>
                            <td>
                                <strong>ESTADO</strong>
                            </td>
                            <td>
                                <strong>DOLOR DE DIFICIL TRATAMIENTO</strong>
                            </td>
                        </tr>';
            while ($res2 = mssql_fetch_array($res)){

                $copia = $copia.'<tr>
                                    <td>
                                        '.$res2['HCACODIGO'].'
                                    </td>
                                    <td>
                                        '.$res2['NOMPAC'].'
                                    </td>
                                    <td>
                                        '.$res2['paciente'].'
                                    </td>
                                    <td>
                                        '.$res2['AINCONSEC'].'
                                    </td>
                                    <td>
                                        '.$res2['EDAD'].'
                                    </td>
                                    <td>
                                        '.$res2['GDENOMBRE'].'
                                    </td>
                                    <td>
                                        '.$res2['auxiliar'].'
                                    </td>
                                    <td>
                                        '.$res2['medico2'].'
                                    </td>
                                    <td>
                                        '.$res2['diagnostico'].'
                                    </td>
                                    <td>
                                        '.$res2['observaciones'].'
                                    </td>
                                    <td>
                                        '.$res2['estado'].'
                                    </td>
                                    <td align="center">
                                        '.$res2['dolordt'].'
                                    </td>
                                </tr>';

            }
            $copia = $copia.'</table>';


            $nombre_fichero_tmp = tempnam("C:/temporales", $copia);

            $gestor = fopen($nombre_fichero_tmp, "w+");

            fwrite($gestor, $copia);

            $origen = $nombre_fichero_tmp; 
            $destino = 'C:/Copia_Tableros/'; 
            if (copy($origen, $destino."Copia_Tablero_Urgencias.xls")) { 

                //echo "Se ha copiado correctamente ".$nom."</br>"; 

            } else { 

                //echo "No se copiado la imagen correctamente"; 

            } 

            fclose($gestor);

             //elimina el temporal

            unlink($nombre_fichero_tmp);
       
            mssql_close();
       
   }else if($tc == 19){
       
        ini_set("mssql.textlimit",2147483647);
        ini_set("mssql.textsize",2147483647);
        //conexion a la base de datos
        $servidor = "192.168.10.9\DINAMICA";
        $usuario = "sa";
        $clave = "admin4";
        $base_de_datos = "planillaUsuario";
        
        //$areas = $_REQUEST['areaServ'];
        $cods = $_REQUEST['codservi'];

        mssql_connect($servidor, $usuario, $clave ) ;
        mssql_select_db($base_de_datos) ;

        $select = "SELECT  HCACODIGO,
                           case when dg10.NOMPAC is null then '' else dg10.NOMPAC end as NOMPAC, 
                           case when dg10.EDAD is null then '' else dg10.EDAD end as EDAD,
                           paciente,
                           case when dg10.AINCONSEC is null then '' else dg10.AINCONSEC end as AINCONSEC, 
                           case when dg10.GDENOMBRE is null then '' else dg10.GDENOMBRE end as GDENOMBRE,
                               case when t.enfactual is null then '' else cast(t.enfactual as text) end as enfact,
                               case when t.tratamiento is null then '' else cast(t.tratamiento as text) end as tratamiento,
                           cast(diagnostico as text)as diagnostico,cast(observaciones as text)as observaciones,
                           case 
                           when estado = 0 then ''  
                           when estado = 1 then 'Observado'
                           when estado = 2 then 'Hospitalizado' 
                           when estado = 3 then 'Administracion de Medicamentos'
                           when estado = 4 then 'Salida' 
                           when estado = 5 then 'Quirofano'
                           end as estado,
                           case when t.dolordt = 1 then 'SI' else 'NO' end as dolordt
                    FROM setablero as t
                                       LEFT OUTER JOIN ".$con->getReal()."..HPNDEFCAM on t.cama = HPNDEFCAM.OID 
                                       outer apply(select RTRIM(PACPRINOM+' '+PACSEGNOM+' '+PACPRIAPE+' '+PACSEGAPE)AS NOMPAC, GDENOMBRE,AINCONSEC,SUBSTRING(CONVERT (VARCHAR(10),AINFECING,103),1,10)+' '+CONVERT(VARCHAR(5), AINFECING, 114) AS FECHA,
                                                         CAST(DATEDIFF(DD, GENPACIEN.GPAFECNAC, GETDATE()) / 365.25 AS INT) AS EDAD
                                                  from ".$con->getReal()."..GENPACIEN left outer join ".$con->getReal()."..ADNINGRESO on GENPACIEN.OID = ADNINGRESO.GENPACIEN
                                                                             INNER JOIN ".$con->getReal()."..GENDETCON AS GE ON ADNINGRESO.GENDETCON=GE.OID
                                                  WHERE AINESTADO=0  and PACNUMDOC = t.paciente)as dg10
                                       outer apply (select count(*) as n
                                                   from setespecialidad
                                                   where setespecialidad.setablero = t.oid and setespecialidad.paciente = t.paciente)as nes
                    WHERE servicio = '".$cods."'";
        $res = mssql_query($select);

        $copia = '<table>
                    <tr align="center">
                        <td>
                            <strong>CAMA</strong>
                        </td>
                        <td>
                            <strong>PACIENTE</strong>
                        </td>
                        <td>
                            <strong>DOCUMENTO</strong>
                        </td>
                        <td>
                            <strong>INGRESO</strong>
                        </td>
                        <td>
                           <strong>EDAD</strong>
                        </td>
                        <td>
                            <strong>ASEGURADOR</strong>
                        </td>
                        <td>
                            <strong>ENFERMEDAD ACTUAL</strong>
                        </td>
                        <td>
                            <strong>TRATAMIENTO</strong>
                        </td>
                        <td>
                            <strong>DIAGNSTICO</strong>
                        </td>
                        <td>
                            <strong>OBSERVACIONES</strong>
                        </td>
                        <td>
                            <strong>ESTADO</strong>
                        </td>
                        <td>
                            <strong>DOLOR DE DIFICIL TRATAMIENTO</strong>
                        </td>
                    </tr>';
        while ($res2 = mssql_fetch_array($res)){

            $copia = $copia.'<tr>
                                <td>
                                    '.$res2['HCACODIGO'].'
                                </td>
                                <td>
                                    '.$res2['NOMPAC'].'
                                </td>
                                <td>
                                    '.$res2['paciente'].'
                                </td>
                                <td>
                                    '.$res2['AINCONSEC'].'
                                </td>
                                <td>
                                    '.$res2['EDAD'].'
                                </td>
                                <td>
                                    '.$res2['GDENOMBRE'].'
                                </td>
                                <td>
                                    '.$res2['enfact'].'
                                </td>
                                <td>
                                    '.$res2['tratamiento'].'
                                </td>
                                <td>
                                    '.$res2['diagnostico'].'
                                </td>
                                <td>
                                    '.$res2['observaciones'].'
                                </td>
                                <td>
                                    '.$res2['estado'].'
                                </td>
                                <td align="center">
                                    '.$res2['dolordt'].'
                                </td>
                            </tr>';

        }
        $copia = $copia.'</table>';


        $nombre_fichero_tmp = tempnam("C:/temporales", $copia);

        $gestor = fopen($nombre_fichero_tmp, "w+");

        fwrite($gestor, $copia);

        $origen = $nombre_fichero_tmp; 
        $destino = 'C:/Copia_Tableros/'; 
        if (copy($origen, $destino."Copia_Tablero_".$cods.".xls")) { 

            //echo "Se ha copiado correctamente ".$nom."</br>"; 

        } else { 

            //echo "No se copiado la imagen correctamente"; 

        } 

        fclose($gestor);

         //elimina el temporal

        unlink($nombre_fichero_tmp);

        mssql_close();
       
   }else if($tc == 20){
       
        ini_set("mssql.textlimit",2147483647);
        ini_set("mssql.textsize",2147483647);
        //conexion a la base de datos
        
        $servidor = "192.168.10.9\DINAMICA";
        $usuario = "sa";
        $clave = "admin4";
        $base_de_datos = "planillaUsuario";

        mssql_connect($servidor, $usuario, $clave ) ;
        mssql_select_db($base_de_datos) ;

        $select = "SELECT  setcamasn.descripcion,dg10.NOMBRES,t.paciente,
                            case when dg10.FECHA is null then '' else dg10.FECHA end FECHA,
                            case when diagnostico is null then '' else cast(diagnostico as text) end as diagnostico,
                            case when t.tratamiento is null then '' else cast(t.tratamiento as text) end as tratamiento,
                            case when observaciones is null then '' else cast(observaciones as text) end as observaciones,
                            case when setclasificaciones.descripcion is null then '' else setclasificaciones.descripcion end as descric,
                            case when atendido = 1 then 'SI' else 'NO' end as atendido
                    FROM setcamasn LEFT OUTER JOIN setablero as t ON setcamasn.oid=t.cama 
                                   LEFT OUTER JOIN setclasificaciones on t.clasificacion=setclasificaciones.oid
                         outer apply(select LTRIM(RTRIM(PACPRINOM)) +' '+ LTRIM(RTRIM(PACSEGNOM)) +' '+ LTRIM(RTRIM(PACPRIAPE)) +' '+ LTRIM(RTRIM(PACSEGAPE)) AS NOMBRES,GDENOMBRE,AINCONSEC,SUBSTRING(CONVERT (VARCHAR(10),AINFECING,103),1,10)+' '+CONVERT(VARCHAR(5), AINFECING, 114) AS FECHA
                                     from ".$con->getReal()."..GENPACIEN left outer join ".$con->getReal()."..ADNINGRESO on GENPACIEN.OID = ADNINGRESO.GENPACIEN
                                                                INNER JOIN ".$con->getReal()."..GENDETCON AS GE ON ADNINGRESO.GENDETCON=GE.OID
                                     where AINESTADO=0 AND AINCAUING=4 and PACNUMDOC = t.paciente)as dg10
                         outer apply (select count(*) as n
                                      from setespecialidad
                                      where setespecialidad.setablero = t.oid and setespecialidad.paciente = t.paciente)as nes
                    where setcamasn.estado = 1 and t.servicio = 'NEO'";
        $res = mssql_query($select);

        $copia = '<table> 
                    <tr align="center">
                        <td>
                            <strong>CAMA</strong>
                        </td>
                        <td>
                            <strong>PACIENTE</strong>
                        </td>
                        <td>
                            <strong>DOCUMENTO</strong>
                        </td>
                        <td>
                            <strong>DIAGNOSTICO</strong>
                        </td>
                        <td>
                            <strong>TRATAMIENTO</strong>
                        </td>
                        <td>
                            <strong>OBSERVACIONES</strong>
                        </td>
                        <td>
                            <strong>ATENDIDO</strong>
                        </td>
                        <td>
                            <strong>CLASIFICACION</strong>
                        </td>
                    </tr>';
        while ($res2 = mssql_fetch_array($res)){

            $copia = $copia.'<tr>
                                <td>
                                    '.$res2['descripcion'].'
                                </td>
                                <td>
                                    '.$res2['NOMBRES'].'
                                </td>
                                <td>
                                    '.$res2['paciente'].'
                                </td>
                                <td>
                                    '.$res2['diagnostico'].'
                                </td>
                                <td>
                                    '.$res2['tratamiento'].'
                                </td>
                                <td>
                                    '.$res2['observaciones'].'
                                </td>
                                <td align="center">
                                    '.$res2['atendido'].'
                                </td>
                                <td>
                                    '.$res2['descric'].'
                                </td>
                            </tr>';

        }
        $copia = $copia.'</table>';


        $nombre_fichero_tmp = tempnam("C:/temporales", $copia);

        $gestor = fopen($nombre_fichero_tmp, "w+");

        fwrite($gestor, $copia);

        $origen = $nombre_fichero_tmp; 
        $destino = 'C:/Copia_Tableros/'; 
        if (copy($origen, $destino."Copia_Tablero_NEONATOS.xls")) { 

            //echo "Se ha copiado correctamente ".$nom."</br>"; 

        } else { 

            //echo "No se copiado la imagen correctamente"; 

        } 

        fclose($gestor);

         //elimina el temporal

        unlink($nombre_fichero_tmp);

        mssql_close();
       
   }else if($tc == 21){
       
       $codserv = $_REQUEST['serv'];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->cargarCamasVH($codserv);
       
   }else if($tc == 22){
       
       $oid = $_REQUEST['oid'];
       $paciente = $_REQUEST['paciente'];
       $cama = $_REQUEST['cama'];
       $codserv = $_REQUEST['serv'];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->traslado2($oid,$paciente,$cama,$codserv);
       
   }else if($tc == 23){
       $enfact = $_REQUEST['enfact'];
       $tratamiento = $_REQUEST['tratamiento'];
       $diagnos = $_REQUEST['diagnos'];
       $observa = $_REQUEST['observa'];
       $esta = $_REQUEST['esta'];
       $oid = $_REQUEST['oid'];
       $dolordt = $_REQUEST['dolordt'];
       $med = $_REQUEST['med'];
       
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->guardarPacienteIncatividad($enfact,$tratamiento,$diagnos,$observa,$esta,$oid,$dolordt,$med);
       
   }
   else if($tc == 24){
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->ConsultarEstado();
   }
   else if($tc == 25){
       $tablero = new Tablero("", "", "", "", "", "", "", "", "", "", "", "", "", "");
       $tablero->ConsultarEstadoQuinto();
   }
   
?>